www.gusucode.com > 茶都拼客网全功能版 8 > 茶都拼客网全功能版 8.8源码程序/teasdxmccom/茶都拼客网V8.8（全功能，无限制，完全开源）/Ku_type/Index_quan.asp
<head>
<meta http-equiv="Content-Language" content="zh-cn">
</head>
<div align="center">
<table cellpadding="0" cellspacing="0" width="212" height="288">
<tr>
<td height="29" background="../Ku_img/quan_001.jpg">
<div align="center">
<table cellpadding="0" cellspacing="0" width="212" height="24">
<tr>
<td height="24" width="29"></td>
<td height="24" width="128" valign="bottom"><div id="dazi">
<p align="left"><b>拼客圈子</b></div></td>
<td height="24" valign="bottom"><a href="Gu_quan.asp"><img border="0" src="pkxx-Img/more.jpg"></a> </td>
</tr>
</table>
</div>
</td>
</tr>
<tr>
<td height="253" background="../Ku_img/quan_002.jpg" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="3">
<%
set rsdown=server.createobject("adodb.recordset")
sqldown="select top 10 * from quan order by id desc"
rsdown.open sqldown,conn,1,1
if Rsdown.eof or Rsdown.bof then
response.write"<div align='center'>暂无任何圈子<div>"
end if
do while not rsdown.eof
downname = rsdown("name")
%>
<tr>
<td width="232" height = 25>
<img border="0" src="pkxx-Img/group.jpg" width="17" height="16">
<a href="My_quan.asp?id=<%=rsdown("id")%>" title="圈子：<%=downname%>
时间：<%=rsdown("addtime")%>
点击：<%=rsdown("hits")%>次">
<font color="<%=rsdown("yanse")%>">
<%
if Getlen(downname)>28 then
response.write LeftStr(downname,26)
response.write "..."
else
response.write ""&downname&""
end if
%></font></a></td>
</tr>
<%
rsdown.movenext
loop
Rsdown.Close
Set Rsdown=Nothing
%>
</table>
</td>
</tr>
<tr>
<td height="6">
<img border="0" src="../Ku_img/quan_003.jpg" width="212" height="6"></td>
</tr>
</table>
<!--首页左下角-【拼客圈子】-下方广告位-->
<table border="0" width="100%" id="table3">
<tr>
<td><% Call Ku_AD(31) %></td>
</tr>
</table>
<!--首页左下角-【拼客圈子】-下方广告位-->
</div>